function z = trimc(x,n1,n2)
% PURPOSE: return a matrix (or vector) x stripped of the specified columns.
% -----------------------------------------------------
% USAGE: z = trimc(x,n1,n2)
% where: x = input matrix (or vector) (n x k)
%       n1 = first n1 columns to strip
%       n2 = last  n2 columns to strip
% NOTE: modeled after Gauss trimc function
% -----------------------------------------------------
% RETURNS: z = x(:,n1+1:n-n2)
% -----------------------------------------------------

% written by:
% James P. LeSage, Dept of Economics
% Texas State University-San Marcos
% 601 University Drive
% San Marcos, TX 78666
% jlesage@spatial-econometrics.com

  z = trimr(x',n1,n2)';
  
